3 function wfSpecialAllpages( $par=NULL )
5 global $indexMaxperpage, $wgRequest, $wgLoadBalancer;
6 $indexMaxperpage = 480;
7 $from = $wgRequest->getVal( 'from' );
9 $wgLoadBalancer->force(-1);
12 indexShowChunk( $par );
13 } elseif( !is_null( $from ) ) {
14 indexShowChunk( $from );
19 $wgLoadBalancer->force(0);
22 function indexShowToplevel()
24 global $wgOut, $indexMaxperpage, $wgLang;
25 $fname = "indexShowToplevel";
28 $vsp = $wgLang->getValidSpecialPages();
29 $log = new LogPage( $vsp["Allpages"] );
30 $log->mUpdateRecentChanges
= false;
34 $log->showAsDisabledPage();
38 $fromwhere = "FROM cur WHERE cur_namespace=0";
39 $order = "ORDER BY cur_title";
42 $sql = "SELECT COUNT(*) AS count $fromwhere";
43 $res = wfQuery( $sql, DB_READ
, $fname );
44 $s = wfFetchObject( $res );
46 $sections = ceil( $count / $indexMaxperpage );
48 $sql = "SELECT cur_title $fromwhere $order LIMIT 1";
49 $res = wfQuery( $sql, DB_READ
, $fname );
50 $s = wfFetchObject( $res );
51 $inpoint = $s->cur_title
;
54 # There's got to be a cleaner way to do this!
55 for( $i = 1; $i < $sections; $i++
) {
56 $from = $i * $indexMaxperpage;
57 $sql = "SELECT cur_title $fromwhere $order ".wfLimitResult(2,$from);
58 $res = wfQuery( $sql, DB_READ
, $fname );
60 $s = wfFetchObject( $res );
61 $outpoint = $s->cur_title
;
62 $out .= indexShowline( $inpoint, $outpoint );
64 $s = wfFetchObject( $res );
65 $inpoint = $s->cur_title
;
70 $from = $i * $indexMaxperpage;
71 $sql = "SELECT cur_title $fromwhere $order ".wfLimitResult(1,$count-1);
72 $res = wfQuery( $sql, DB_READ
, $fname );
73 $s = wfFetchObject( $res );
74 $outpoint = $s->cur_title
;
75 $out .= indexShowline( $inpoint, $outpoint );
79 $log->replaceContent( $out );
81 $wgOut->addHtml( $out );
84 function indexShowline( $inpoint, $outpoint )
86 global $wgOut, $wgLang, $wgUser;
87 $sk = $wgUser->getSkin();
92 $sk->makeKnownLink( $wgLang->specialPage( "Allpages" ),
93 str_replace( "_", " ", $inpoint ),
94 "from=" . wfStrencode( $inpoint ) ) . "</td><td>",
95 "</td><td align=\"left\">" .
96 str_replace( "_", " ", $outpoint )
98 return "<tr><td align=\"right\">{$out}</td></tr>\n";
101 function indexShowChunk( $from )
103 global $wgOut, $wgUser, $indexMaxperpage, $wgLang;
104 $sk = $wgUser->getSkin();
105 $maxPlusOne = $indexMaxperpage +
1;
108 $sql = "SELECT cur_title FROM cur WHERE cur_namespace=0 AND cur_title >= '"
109 . wfStrencode( $from ) . "' ORDER BY cur_title LIMIT " . $maxPlusOne;
110 $res = wfQuery( $sql, DB_READ
, "indexShowChunk" );
112 ### FIXME: side link to previous
115 $out = "<table border=\"0\" width=\"100%\">\n";
116 while( ($n < $indexMaxperpage) && ($s = wfFetchObject( $res )) ) {
117 $t = Title
::makeTitle( 0, $s->cur_title
);
119 $link = $sk->makeKnownLinkObj( $t );
121 $link = "[[" . htmlspecialchars( $s->cur_title
) . "]]";
126 $out .= "<td>$link</td>";
132 if( ($n %
3) != 0 ) {
137 $out2 = "<div style='text-align: right; font-size: smaller; margin-bottom: 1em;'>" .
138 $sk->makeKnownLink( $wgLang->specialPage( "Allpages" ),
139 wfMsg ( 'allpages' ) );
140 if ( ($n == $indexMaxperpage) && ($s = wfFetchObject( $res )) ) {
141 $out2 .= " | " . $sk->makeKnownLink(
142 $wgLang->specialPage( "Allpages" ),
143 wfMsg ( 'nextpage', $s->cur_title
),
144 "from=" . wfStrencode( $s->cur_title
) );
148 $wgOut->addHtml( $out2 . $out );